home *** CD-ROM | disk | FTP | other *** search
/ Network Support Library / RoseWare - Network Support Library.iso / apidev / tpapi.exe / NWMESS.PA1 < prev    next >
Text File  |  1994-01-14  |  4KB  |  83 lines

  1. {#Z+}
  2. {(10U&l12D(s4099T&k2S*}
  3. {***************************************************************************}
  4. {** Program : NWMESS                                                      **}
  5. {***************************************************************************}
  6. {** Version : 1.4             ** Started : 11/11/91  ** Ended :   /  /    **}
  7. {***************************************************************************}
  8. {******************************** Description ******************************}
  9. {***************************************************************************}
  10. {** OOP library for Netware API                                           **}
  11. {**                                                                       **}
  12. {** This unit forms the second level object : MESSAGE                     **}
  13. {** This object is a descandent of          : NETWARE                     **}
  14. {**                                                                       **}
  15. {**                                                                       **}
  16. {**                                                                       **}
  17. {**                                                                       **}
  18. {***************************************************************************}
  19. {******************************** Information ******************************}
  20. {***************************************************************************}
  21. {** Provides Netware Messaging Services                                   **}
  22. {**                                                                       **}
  23. {**                                                                       **}
  24. {**                                                                       **}
  25. {** This code is (c) 1991 - 1994 Antonio Covelli. ALL RIGHTS RESERVED.    **}
  26. {** Portions (c) Novell Inc,                                              **}
  27. {**                                                                       **}
  28. {**                                                                       **}
  29. {***************************************************************************}
  30.  
  31. {$I NETWARE.INC}
  32. {#Z-}
  33.  
  34. UNIT NWMESS;
  35.  
  36. INTERFACE
  37.  
  38. USES
  39.  
  40.   nwvar,
  41.   netware;
  42.  
  43. TYPE
  44.  
  45.   PMessageOBJ = ^MessageOBJ;
  46.   MessageOBJ  = OBJECT (NetwareOBJ)
  47.  
  48.     FUNCTION BroadcastToConsole (Message : TConsoleMessage) : WORD;
  49.  
  50.     FUNCTION    CheckPipeStatus      (ConnectionList : TConnectionList; VAR ResultList : TConnectionList;
  51.                                       VAR ConnectionCount : BYTE) : WORD;
  52.  
  53.     FUNCTION    CloseMessagePipe     (ConnectionList : TConnectionList; VAR ResultList : TConnectionList;
  54.                                       VAR ConnectionCount : BYTE) : WORD;
  55.  
  56.     FUNCTION    DisableBroadcasts : WORD;
  57.  
  58.     FUNCTION    EnableBroadcasts : WORD;
  59.  
  60.     FUNCTION    GetBroadcastMessage  (VAR Message : TBroadcastMessage) : WORD;
  61.  
  62.     FUNCTION    GetBroadcastMode : WORD;
  63.  
  64.     FUNCTION    GetPersonalMessage   (VAR Message : TPersonalMessage; VAR SourceConnection : WORD) : WORD;
  65.  
  66.     FUNCTION    LogNetworkMessage    (Message : TConsoleMessage) : WORD;
  67.  
  68.     FUNCTION    OpenMessagePipe      (ConnectionList : TConnectionList; VAR ResultList : TConnectionList;
  69.                                       VAR ConnectionCount : BYTE) : WORD;
  70.  
  71.     FUNCTION    SendBroadcastMessage (Message : TBroadcastMessage; ConnectionList : TConnectionList;
  72.                                       VAR ResultList : TConnectionList; ConnectionCount : BYTE) : WORD;
  73.  
  74.     FUNCTION    SendPersonalMessage  (Message : TPersonalMessage; ConnectionList : TConnectionList;
  75.                                       VAR ResultList : TConnectionList; ConnectionCount : BYTE) : WORD;
  76.  
  77.     PROCEDURE   SetBroadcastMode     (BroadcastMode : WORD);
  78.  
  79.     DESTRUCTOR  Done; VIRTUAL;
  80.  
  81.   END;
  82.  
  83.